﻿Imports System.Data.OleDb
Public Class list
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btn_Tagsearch.Click
        Dim url As String = "Dealbytags.aspx?Tagname=" & tb_Tagsearch.Text
        Response.Redirect(url)
    End Sub

    
End Class